package CArg;

use Signature;

sub new {
	my ($class, $signature) = @_;
	return bless { sig => $signature }, $class;
}

sub type {
	return (shift)->{sig}->{type};
}

sub to_class {
	my ($sig) = (shift)->{sig};
	return class_sig($sig->{name}, $sig->{namespace}, '');
}

1;